home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / BEERSRC.ZIP / BALLER.ASH next >
Encoding:
Text File  |  1993-12-26  |  9.8 KB  |  429 lines
  1.  
  2.  
  3.  
  4. ; top of file "baller.ash"
  5.  
  6.  
  7. FALSE               EQU     0
  8.  
  9. TRUE                EQU     1
  10.  
  11. GAMESPEED           EQU     0e8f6h
  12.  
  13. LEVELS              EQU     5
  14.  
  15. BARY                EQU     211
  16.  
  17. BARSCOREX           EQU     114
  18.  
  19. BARSCOREY           EQU     212
  20.  
  21. BARSCORESPC         EQU     6
  22.  
  23. BARLIFEX            EQU     40
  24.  
  25. BARCLRDIGIT         EQU     10
  26.  
  27. BARLIFEDIGIT        EQU     11
  28.  
  29. INTINDEXSIZE        EQU     100
  30.  
  31. PTRINDEXSIZE        EQU     200
  32.  
  33. IDEAL
  34.  
  35. TYPEDEF              ulong               DWORD 
  36.  
  37. STARLIFES           EQU     4
  38.  
  39. STARTSHIPSPEED      EQU     4
  40.  
  41. MAXSHIPSPEED        EQU     8
  42.  
  43. W_ISWEAPON          EQU     08000h
  44.  
  45. W_SPEEDUP           EQU     00001h
  46.  
  47. W_EXTRALIFE         EQU     00002h
  48.  
  49. NAMESIZE            EQU     20
  50.  
  51. STRUC              armstrc             
  52. armname             DB      20 DUP ( ? )
  53. sprite              DW      ?
  54. shot                DW      ?
  55. cost                DW      ?
  56. period              DW      ?
  57. flags               DW      ?
  58.  
  59. ENDS              armstrc             
  60.  
  61. SHOTEND             EQU     08000h
  62.  
  63. SHOTRELEASE         EQU     08001h
  64.  
  65. SHOTHOMING          EQU     08002h
  66.  
  67. SHOTREFLECT         EQU     08003h
  68.  
  69. STRUC              shotstrc            
  70. shotx               DW      ?
  71. shoty               DW      ?
  72. power               DW      ?
  73. speed               DW      ?
  74. sprite              DW      ?
  75. data                DW      1 DUP ( ? )
  76.  
  77. ENDS              shotstrc            
  78.  
  79. FOE_ENDLEVEL        EQU     001h
  80.  
  81. FOE_INVINCIBLE      EQU     002h
  82.  
  83. FOE_TRANSPARENT     EQU     004h
  84.  
  85. FOE_STOPCOUNT       EQU     008h
  86.  
  87. FOE_PATH            EQU     010h
  88.  
  89. FOE_LINE            EQU     020h
  90.  
  91. FOEENDPATH          EQU     08000h
  92.  
  93. FOECHANGESPRITE     EQU     08001h
  94.  
  95. FOERELEASEFOE       EQU     08002h
  96.  
  97. FOECYCLEPATH        EQU     08004h
  98.  
  99. FOEMARK             EQU     08005h
  100.  
  101. FOESOUND            EQU     08006h
  102.  
  103. STRUC              foestrc             
  104. flags               DW      ?
  105. shield              DW      ?
  106. score               DW      ?
  107. expl                DW      ?
  108. sprite              DW      ?
  109. speed               DW      ?
  110. path                DW      1 DUP ( ? )
  111.  
  112. ENDS              foestrc             
  113.  
  114. EXPLEND             EQU     08000h
  115.  
  116. EXPLNEW             EQU     08001h
  117.  
  118. EXPLWAIT            EQU     08002h
  119.  
  120. EXPLSOUND           EQU     08003h
  121.  
  122. EXPLREMOVEOBJ       EQU     08004h
  123.  
  124. EXPLRELEASEFOE      EQU     08005h
  125.  
  126. EXPLNEWPATH         EQU     08006h
  127.  
  128. STRUC              explstrc            
  129. dummy               DW      ?
  130. data                DW      1 DUP ( ? )
  131.  
  132. ENDS              explstrc            
  133.  
  134. MAXARMS             EQU     7
  135.  
  136. MAXFOES             EQU     26
  137.  
  138. MAXSHOTS            EQU     30
  139.  
  140. MAXEXPLS            EQU     8
  141.  
  142. WIN_CTIME           EQU     100
  143.  
  144. LOSE_CTIME          EQU     60
  145.  
  146. SHIELD_CTIME        EQU     70
  147.  
  148. STRUC              aniarm              
  149. object              DW      ?
  150. shot                DW      ?
  151. period              DW      ?
  152. flags               DW      ?
  153. periodcnt           DW      ?
  154.  
  155. ENDS              aniarm              
  156.  
  157. STRUC              anishot             
  158. object              DW      ?
  159. go                  DW      ?
  160. power               DW      ?
  161. speed               DW      ?
  162. dx                  DW      ?
  163. dy                  DW      ?
  164. data                DD      FAR PTR ?
  165.  
  166. ENDS              anishot             
  167.  
  168. STRUC              anifoe              
  169. object              DW      ?
  170. flags               DW      ?
  171. score               DW      ?
  172. expl                DW      ?
  173. shield              DW      ?
  174. path                DD      FAR PTR ?
  175. savex               DW      ?
  176. savey               DW      ?
  177. cpath               DD      FAR PTR ?
  178. speed               DW      ?
  179. dx                  DW      ?
  180. dy                  DW      ?
  181. dz                  DW      ?
  182. z0                  DW      ?
  183. z1                  DW      ?
  184. pixelcnt            DW      ?
  185.  
  186. ENDS              anifoe              
  187.  
  188. STRUC              aniexpl             
  189. object              DW      ?
  190. x                   DW      ?
  191. y                   DW      ?
  192. data                DD      FAR PTR ?
  193.  
  194. ENDS              aniexpl             
  195.  
  196. STRUC              sTableEntry         
  197. sprite              DD      FAR PTR ?
  198. flags               DW      ?
  199.  
  200. ENDS              sTableEntry         
  201.  
  202. STRUC              descrstrc           
  203. level               DW      ?
  204. text                DB      40 DUP ( ? )
  205. nbigboss            DW      ?
  206. score               DW      ?
  207. money               DW      ?
  208. flags               DW      ?
  209.  
  210. ENDS              descrstrc           
  211.  
  212. A_COMMAND           EQU     08000h
  213.  
  214. A_GOFIELD           EQU     08000h
  215.  
  216. A_STOPFIELD         EQU     08001h
  217.  
  218. A_SOUND             EQU     08002h
  219.  
  220. A_MARK              EQU     08003h
  221.  
  222. STRUC              attackstrc          
  223. count               DW      ?
  224. x                   DW      ?
  225. y                   DW      ?
  226. foe                 DW      ?
  227.  
  228. ENDS              attackstrc          
  229.  
  230. STRUC              levelstrc           
  231. descript            DD      FAR PTR ?
  232. nstars              DW      ?
  233. star                DD      FAR PTR ?
  234. nattacks            DW      ?
  235. attack              DD      FAR PTR ?
  236. nsprites            DW      ?
  237. sprite              DD      FAR PTR ?
  238. nfoes               DW      ?
  239. foe                 DD      FAR PTR ?
  240. nexpls              DW      ?
  241. expl                DD      FAR PTR ?
  242. nsounds             DW      ?
  243. sound               DD      FAR PTR ?
  244.  
  245. ENDS              levelstrc           
  246.  
  247. STRUC              weaponstrc          
  248. narms               DW      ?
  249. arm                 DD      FAR PTR ?
  250. nshots              DW      ?
  251. shot                DD      FAR PTR ?
  252. nsprites            DW      ?
  253. sprite              DD      FAR PTR ?
  254.  
  255. ENDS              weaponstrc          
  256.  
  257. STRUC              weaponlststrc       
  258. object              DW      ?
  259. dx                  DW      ?
  260. dy                  DW      ?
  261. arm                 armstrc <>
  262.  
  263. ENDS              weaponlststrc       
  264.  
  265. KEYSPACE            EQU     039h
  266.  
  267. KEYENTER            EQU     01ch
  268.  
  269. KEYLEFT             EQU     04bh
  270.  
  271. KEYRIGHT            EQU     04dh
  272.  
  273. KEYUP               EQU     048h
  274.  
  275. KEYDOWN             EQU     050h
  276.  
  277. KEYESC              EQU     001h
  278.  
  279. KEYPAUSE            EQU     019h
  280.  
  281. KEYONE              EQU     002h
  282.  
  283. KEYTWO              EQU     003h
  284.  
  285. KEYTHREE            EQU     004h
  286.  
  287. KEYFOUR             EQU     005h
  288.  
  289. KEYFIVE             EQU     006h
  290.  
  291. KEYSIX              EQU     007h
  292.  
  293. CHEATLIFES          EQU     001h
  294.  
  295. CHEATMONEY          EQU     002h
  296.  
  297. CHEATCRASH          EQU     004h
  298.  
  299. _ext                EQU     <extern>
  300.  
  301. GLOBAL C            key                 :BYTE  :128
  302.  
  303. GLOBAL C            key_up              :WORD 
  304.  
  305. GLOBAL C            key_down            :WORD 
  306.  
  307. GLOBAL C            key_left            :WORD 
  308.  
  309. GLOBAL C            key_right           :WORD 
  310.  
  311. GLOBAL C            key_fire            :WORD 
  312.  
  313. GLOBAL C            key_pause           :WORD 
  314.  
  315. GLOBAL C            pressedkeys         :WORD 
  316.  
  317. GLOBAL C            tick                :WORD 
  318.  
  319. GLOBAL C            _arm                :aniarm
  320.  
  321. GLOBAL C            _foe                :anifoe
  322.  
  323. GLOBAL C            _shot               :anishot
  324.  
  325. GLOBAL C            _expl               :aniexpl
  326.  
  327. GLOBAL C            money               :DWORD 
  328.  
  329. GLOBAL C            score               :DWORD 
  330.  
  331. GLOBAL C            scoreold            :DWORD 
  332.  
  333. GLOBAL C            cheatlevel          :WORD 
  334.  
  335. GLOBAL C            shipspeed           :WORD 
  336.  
  337. GLOBAL C            lifes               :WORD 
  338.  
  339. GLOBAL C            stage               :WORD 
  340.  
  341. GLOBAL C            nweapons            :WORD 
  342.  
  343. GLOBAL C            weaponlst           :weaponlststrc
  344.  
  345. GLOBAL C            datapool            :FAR PTR WORD 
  346.  
  347. GLOBAL C            level               :levelstrc
  348.  
  349. GLOBAL C            lsprofs             :WORD 
  350.  
  351. GLOBAL C            lfoeofs             :WORD 
  352.  
  353. GLOBAL C            lexplofs            :WORD 
  354.  
  355. GLOBAL C            lsndofs             :WORD 
  356.  
  357. GLOBAL C            weapon              :weaponstrc
  358.  
  359. GLOBAL C            intindex            :WORD  :100
  360.  
  361. GLOBAL C            intindexptr         :WORD 
  362.  
  363. GLOBAL C            ptrindex            :FAR PTR WORD  :200
  364.  
  365. GLOBAL C            ptrindexptr         :WORD 
  366.  
  367. GLOBAL C            barfonthandle       :WORD 
  368.  
  369. GLOBAL C            int09               :FAR PTR FAR
  370.  
  371. GLOBAL C            int08               :FAR PTR FAR
  372.  
  373. GLOBAL C            error               :NEAR
  374.  
  375. GLOBAL C            intro               :NEAR
  376.  
  377. GLOBAL C            loadhighscore       :NEAR
  378.  
  379. GLOBAL C            savehighscore       :NEAR
  380.  
  381. GLOBAL C            highscore           :NEAR
  382.  
  383. GLOBAL C            menu                :NEAR
  384.  
  385. GLOBAL C            loadconfig          :NEAR
  386.  
  387. GLOBAL C            saveconfig          :NEAR
  388.  
  389. GLOBAL C            playthegame         :NEAR
  390.  
  391. GLOBAL C            setspeed            :NEAR
  392.  
  393. GLOBAL C            killallbuddies      :NEAR
  394.  
  395. GLOBAL C            waitforkey          :NEAR
  396.  
  397. GLOBAL C            waitdelayedkey      :NEAR
  398.  
  399. GLOBAL C            writetext           :NEAR
  400.  
  401. GLOBAL C            writenumber         :NEAR
  402.  
  403. GLOBAL C            defallarms          :NEAR
  404.  
  405. GLOBAL C            weaponmanager       :NEAR
  406.  
  407. GLOBAL C            copytoCS            :NEAR
  408.  
  409. GLOBAL C            defarm              :NEAR
  410.  
  411. GLOBAL C            displifes           :NEAR
  412.  
  413. GLOBAL C            setplayposition     :NEAR
  414.  
  415. GLOBAL C            play                :NEAR
  416.  
  417. GLOBAL C            lall1               :NEAR
  418.  
  419. GLOBAL C            lall2               :NEAR
  420.  
  421. GLOBAL C            waitfortick         :NEAR
  422.  
  423. GLOBAL C            newint09            :FAR
  424.  
  425. GLOBAL C            newint08            :FAR
  426.  
  427. ; end of file "baller.ash"
  428.  
  429.